home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 5 / Amiga Tools 5.iso / tools / dfÜ / bbs / tronbbs / tron / menus / mail.src < prev    next >
Text File  |  1996-07-16  |  2KB  |  156 lines
  1.  
  2. Menu "Mail.menu"
  3.  
  4. flags  hotkeyable
  5. level    0 - 239 , "Mail"                          ;"Mail.Ansi"
  6. level  240 - 255 , "Mail"                      ;"Mail.sys.Ansi"
  7. prompt 0 , 0 - 255 , "|Mail Menu : "
  8. prompt 1 , 0 - 255 , "|Mail Menu : "
  9.  
  10. BEGIN     ; Start the command definitions
  11.  
  12.  
  13. MenuBegin
  14. ;   Print "MailMenu|"
  15.    LogMessage "Entered mail menu."
  16. EndCmd
  17.  
  18.  
  19. Cmd "G" , 0-255
  20.    GotoMenu "Logout.Menu"
  21. EndCmd
  22.  
  23. Cmd "Q" , 0-255
  24.    GotoMenu "Main.Menu"
  25. EndCmd
  26.  
  27. Cmd "S" , 0-255
  28.    GotoMenu "ScanMsgs.Menu"
  29. EndCmd
  30.  
  31. Cmd "R" , 0-255
  32.    GotoMenu "ReadMsgs.Menu"
  33. EndCmd
  34.  
  35.  
  36. Cmd "1" , 0-255
  37.    ChangeMessageArea "1"
  38.    LogMessage "Changed to message area: ~101."
  39. EndCmd
  40.  
  41. Cmd "2" , 0-255
  42.    ChangeMessageArea "2"
  43.    LogMessage "Changed to message area: ~101."
  44. EndCmd
  45.  
  46. Cmd "3" , 0- 255
  47.    ChangeMessageArea "3"
  48.    LogMessage "Changed to message area: ~101."
  49. EndCmd
  50.  
  51.  
  52.  
  53. Cmd "-" , 0- 255
  54.    PreviousMenu
  55. EndCmd
  56.  
  57.  
  58.  
  59.  
  60. Cmd "O" , 0-255
  61.    ClrScr
  62.    ListMsgAreas
  63.    ; PrintFile "tron:text/MsgAreas.ansi"
  64.    OtherMessageArea
  65.    LogMessage "Changed to message area: ~101."
  66. EndCmd
  67.  
  68. Cmd "A" , 0-255
  69.    OtherMessageArea
  70.    LogMessage "Changed to message area: ~101."
  71. EndCmd
  72.  
  73.  
  74.  
  75.  
  76. Cmd "4" , 0-255
  77.    ClrScr
  78.    PrintFile "tron:text/NetMail.ansi"
  79.    OtherMessageArea
  80.    LogMessage "Changed to message area: ~101."
  81. EndCmd
  82.  
  83. Cmd "5" , 0-255
  84.    ClrScr
  85.    PrintFile "tron:text/NLA.ansi"
  86.    OtherMessageArea
  87.    LogMessage "Changed to message area: ~101."
  88. EndCmd
  89.  
  90. Cmd "6" , 0-255
  91.    ClrScr
  92.    PrintFile "tron:text/DAN.ansi"
  93.    OtherMessageArea
  94.    LogMessage "Changed to message area: ~101."
  95. EndCmd
  96.  
  97.  
  98.  
  99.  
  100. Cmd "N" , 0-255
  101.    ReadNew
  102. EndCmd
  103.  
  104. Cmd "Z" , 0-255
  105.    ReadGlobalNew
  106. EndCmd
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113. Cmd "W" , 0-255
  114.    ClrScr
  115.    ReadWaitingMail
  116. EndCmd
  117.  
  118. Cmd "L" , 0-255
  119.    PlaySample "tron:samples/alf-yes!"
  120.    WriteMessage
  121. EndCmd
  122.  
  123. Cmd "E" , 0-255
  124.    GotoMenu "Editor.menu"
  125. EndCmd
  126.  
  127. Cmd "I" , 0-255
  128.    EditSignature
  129. EndCmd
  130.  
  131.  
  132.  
  133.  
  134.  
  135. Cmd "F" , 0-255
  136.    ReadForward
  137. EndCmd
  138.  
  139. Cmd "M" , 0-255
  140.    ReadMarkedMessages
  141. ;   UnmarkMessages
  142. EndCmd
  143.  
  144. Cmd "U" , 0-255
  145.    UnmarkMessages
  146. EndCmd
  147.  
  148. Cmd "@" , 0-255
  149.    FlushUserData
  150. EndCmd
  151.  
  152.  
  153.  
  154. END
  155.  
  156.